object frmOptions: TfrmOptions Left = 371 Top = 199 HorzScrollBar.Visible = False VertScrollBar.Visible = False BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Options' ClientHeight = 393 ClientWidth = 473 Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnShow = FormShow PixelsPerInch = 120 TextHeight = 16 object butOK: TButton Left = 240 Top = 361 Width = 98 Height = 27 Caption = '&OK' Default = True TabOrder = 1 OnClick = butOKClick end object butCancel: TButton Left = 352 Top = 361 Width = 98 Height = 27 Cancel = True Caption = '&Cancel' TabOrder = 2 OnClick = butCancelClick end object PageControl1: TPageControl Left = 9 Top = 9 Width = 456 Height = 336 ActivePage = TabSheet1 TabOrder = 0 object TabSheet1: TTabSheet Caption = 'General' object grpTime: TRadioGroup Left = 9 Top = 9 Width = 192 Height = 96 Caption = 'Time Tracking' ItemIndex = 0 Items.Strings = ( '&Ellapsed' '&Relative') TabOrder = 0 end object grpUniverse: TGroupBox Left = 9 Top = 112 Width = 432 Height = 89 Caption = 'Universe Type' TabOrder = 2 object Label1: TLabel Left = 9 Top = 25 Width = 128 Height = 17 AutoSize = False Caption = 'Gravity varies as: (k)(r)�' end object Label2: TLabel Left = 65 Top = 57 Width = 53 Height = 17 AutoSize = False Caption = 'Where &k = ' FocusControl = editK end object Label3: TLabel Left = 272 Top = 57 Width = 39 Height = 17 AutoSize = False Caption = '&and � = ' FocusControl = editX end object editK: TEdit Left = 137 Top = 52 Width = 88 Height = 24 TabOrder = 0 Text = '1' end object editX: TEdit Left = 329 Top = 52 Width = 88 Height = 24 TabOrder = 1 Text = '-2' end end object grpSize: TGroupBox Left = 9 Top = 208 Width = 432 Height = 57 Caption = 'Body Size' TabOrder = 3 object Label4: TLabel Left = 9 Top = 25 Width = 288 Height = 16 AutoSize = False Caption = 'Enlarge all &objects'#39' viewed sizes by a factor of:' FocusControl = editSize WordWrap = True end object editSize: TEdit Left = 304 Top = 21 Width = 57 Height = 24 TabOrder = 0 Text = '1' end end object grpCoSys: TRadioGroup Left = 208 Top = 9 Width = 233 Height = 96 Caption = 'Coordinate System' ItemIndex = 0 Items.Strings = ( 'Car&tesian' '&Cylindreical Polar' '&Spherical Polar') TabOrder = 1 end end object TabSheet2: TTabSheet Caption = 'Units' object GroupBox1: TGroupBox Left = 9 Top = 9 Width = 240 Height = 176 Caption = 'Distance' TabOrder = 0 object Radiom: TRadioButton Left = 9 Top = 25 Width = 128 Height = 16 Caption = 'Meters (m)' Checked = True TabOrder = 0 TabStop = True OnClick = RadiomClick end object Radiokm: TRadioButton Left = 9 Top = 48 Width = 128 Height = 17 Caption = 'Kilometers (km)' TabOrder = 1 OnClick = RadiomClick end object Radiokm2: TRadioButton Left = 9 Top = 73 Width = 120 Height = 16 Caption = 'Kilometers x 10^' TabOrder = 2 OnClick = Radiokm2Click end object UpDown1: TUpDown Left = 178 Top = 68 Width = 20 Height = 24 Associate = editDistExponent Min = -1000 Max = 1000 Position = 1 TabOrder = 3 Wrap = False end object editDistExponent: TEdit Left = 130 Top = 68 Width = 48 Height = 24 TabOrder = 4 Text = '1' OnChange = editDistExponentChange end object Radiomi: TRadioButton Left = 9 Top = 96 Width = 144 Height = 17 Caption = 'Miles (mi)' TabOrder = 5 OnClick = RadiomClick end object RadioAU: TRadioButton Left = 9 Top = 121 Width = 176 Height = 16 Caption = 'Astronomical Units (AU)' TabOrder = 6 OnClick = RadiomClick end object RadioLY: TRadioButton Left = 9 Top = 144 Width = 176 Height = 17 Caption = 'Light Years (LY)' TabOrder = 7 OnClick = RadiomClick end end object RadioGrpVel: TRadioGroup Left = 256 Top = 9 Width = 185 Height = 96 Caption = 'Velocity' ItemIndex = 0 Items.Strings = ( 'm/s' 'km/s' 'km/h') TabOrder = 2 end object GroupBox2: TGroupBox Left = 9 Top = 192 Width = 240 Height = 105 Caption = 'Mass' TabOrder = 1 object Radiokg: TRadioButton Left = 9 Top = 25 Width = 112 Height = 16 Caption = 'Kilograms (kg)' Checked = True TabOrder = 0 TabStop = True OnClick = RadioEMClick end object RadioKG2: TRadioButton Left = 9 Top = 48 Width = 120 Height = 17 Caption = 'Kilograms x 10^' TabOrder = 1 OnClick = RadioKG2Click end object UpDown2: TUpDown Left = 178 Top = 44 Width = 20 Height = 24 Associate = editMassExponent Min = -1000 Max = 1000 Position = 1 TabOrder = 2 Wrap = False end object editMassExponent: TEdit Left = 130 Top = 44 Width = 48 Height = 24 TabOrder = 3 Text = '1' OnChange = editMassExponentChange end object RadioEM: TRadioButton Left = 9 Top = 73 Width = 152 Height = 16 Caption = 'Earth Masses (EM)' TabOrder = 4 OnClick = RadioEMClick end end object RadioGrpRadius: TRadioGroup Left = 256 Top = 112 Width = 185 Height = 97 Caption = 'Radius' ItemIndex = 0 Items.Strings = ( 'Meters (m)' 'Kilometers (km)' 'Earth Radii (ER)') TabOrder = 3 end object RadioGrpAngle: TRadioGroup Left = 256 Top = 217 Width = 185 Height = 80 Caption = 'Angles' ItemIndex = 0 Items.Strings = ( 'Degrees (deg)' 'Radians (rad)') TabOrder = 4 end end end end